ocr: DBLISTPAS DX dblist proceaure Trorml.Formcreate(Sender: TObject); begin with Tablei do begin open, while not uor do begin DEL1stBox1.1 Items - kdd (FieldByName (Color").asstring) : Next; ead; end; ond; 3570Modied ilnseet Figure 2: The OnCreafe event handier for Forml.
